home *** CD-ROM | disk | FTP | other *** search
/ ROM Magic / ROM Magic.iso / pc / 01_kinb / o_ma / 00037_Script_37 < prev   
Text File  |  1994-10-06  |  1KB  |  71 lines
  1. on startMovie
  2.   global outtime
  3.   if not soundBusy (1) then
  4.     sound playFile 1, "O_Sound"   ---SOUND
  5.   end if
  6.   delay
  7.   when timeOut then go to marker (1)
  8.   set the timeOutLength = 5*60
  9.   startTimer
  10. end startMovie
  11.  
  12. on idle
  13.   if not soundBusy (1) then
  14.     sound playFile 1, "O_Sound"
  15.   end if
  16. end idle
  17.  
  18. on stepMovie
  19.   
  20.   if not soundBusy (1) then
  21.     sound playFile 1, "O_Sound"   ---SOUND
  22.   end if
  23.   
  24.   if the frame =9 then   ---LAST FRAME
  25.     delay
  26.     set the timeOutLength = 5*60
  27.     when timeOut then go to 1 of movie "O_Main"   ---MENU
  28.     startTimer
  29.   else
  30.     if the frame =2 then   ---ENLARGE
  31.       delay
  32.       set the timeOutLength = 10*60
  33.       startTimer
  34.     else
  35.       if the frame =6 then   ---ENLARGE
  36.         delay
  37.         set the timeOutLength = 10*60
  38.         startTimer
  39.       else
  40.         delay
  41.         set the timeOutLength = 5*60
  42.         when timeOut then go to marker (1)
  43.         startTimer
  44.       end if
  45.     end if
  46.   end if
  47. end stepMovie
  48.  
  49. on teisi
  50.   puppetSprite 6,TRUE
  51.   set the castNum of sprite 6 to H12
  52.   updateStage
  53.   when timeOut then 
  54.   delay
  55.   set the timeOutLength = 10*60*60
  56.   when timeOut then go to marker (1)
  57.   startTimer
  58.   set the castNum of sprite 6 to H11
  59.   puppetSprite 6,False
  60. end teisi
  61.  
  62. on zokkou
  63.   puppetSprite 6,False
  64.   if the frame = 9 then   ---LAST FRAME
  65.     go to 1 of movie "O_Main"   ---MENU
  66.   else
  67.     go to marker (1)
  68.   end if
  69. end zokkou
  70.  
  71.